(Fml_if): Initialize val.

diff --git a/src/mocklisp.c b/src/mocklisp.c
index dfcee79bd22f206f70ac7c85ac608346cba5b5b6..00329b8038ed23f672819836d0462591e2c4a9f2 100644 (file)
--- a/src/mocklisp.c
+++ b/src/mocklisp.c
@@ -50,6 +50,7 @@ DEFUN ("ml-if", Fml_if, Sml_if, 0, UNEVALLED, 0, "Mocklisp version of `if'.")
   register Lisp_Object val;
   struct gcpro gcpro1;
 
+  val = Qnil;
   GCPRO1 (args);
   while (!NILP (args))
     {